home *** CD-ROM | disk | FTP | other *** search
/ Softdisk G-S 156 / SGDS 156.2mg / SDGS.156 / A / CT.START.PLAY (.txt) < prev    next >
Encoding:
Applesoft BASIC Source Code  |  1994-07-12  |  409 b   |  15 lines  |  [FC] Applesoft BASIC Program (0x0801)
  1. 1  REM  REDEMPTION III
  2. 2  REM   THE CURSE OF TALON
  3. 3  REM  BY SAM RUBY
  4. 4  REM 
  5. 5  REM  LAST MODIFICATIONS:
  6. 6  REM     07/AUG/94 4:00 PM
  7. 7  REM 
  8. 8 D$ =  CHR$(4)
  9. 10  PRINT D$"RESTORE CT.DATABASE"
  10. 20 FF$ =  CHR$(12)
  11. 25  PRINT D$"OPEN"ED$",L242": PRINT D$"OPEN"ER$",L";LR
  12. 30 WD$ = LE$( INT( RND(1) *4)) +"K" +LE$( INT( RND(1) *4)) +"L" +LE$( INT( RND(1) *4))
  13. 35 CP = 80: HOME : IF RZ  THEN  PRINT D$"CHAIN CT.MAIN.PGM,@100"
  14. 40  PRINT D$"CHAIN CT.MAIN.PGM,@3500"
  15. 29000  PRINT D$"RESTORE CT.SAVED.GAME":RZ = 1: GOTO 20